# cr16 testcase for st $src1,@$src2
# mach(): cr16

	.include "testutils.inc"

	start

	.global st
st:
	movd $data_loc,  (r4,r3)
	movw $0x1234,r5

	storw r5,0(r4,r3)

	loadw 0(r4,r3),r1
	test_h_gr r1, 0x1234

	pass

data_loc:
	.word 0
